home *** CD-ROM | disk | FTP | other *** search
/ Turnbull China Bikeride / Turnbull China Bikeride - Disc 1.iso / HENSA / MISC / SHELL.ARC / Shell / Sources / c / WaitClick < prev   
Encoding:
Text File  |  1994-05-28  |  478 b   |  33 lines
  1. #include "DeskLib:Event.h"
  2.  
  3. #include "Shell.WaitClick.h"
  4. #include "Shell.Shell.h"
  5.  
  6.  
  7. static BOOL paused;
  8.  
  9.  
  10.  
  11. static BOOL ClickHandler( event_pollblock *event, void *reference)
  12. {
  13. UNUSED( event);
  14. UNUSED( reference);
  15.  
  16. paused = FALSE;
  17. return TRUE;
  18. }
  19.  
  20.  
  21. void Shell_WaitClick( void)
  22. {
  23. paused = TRUE;
  24. Event_Claim( event_CLICK, event_ANY, event_ANY, ClickHandler, NULL);
  25.  
  26. do    Shell_Poll();
  27.     while (paused);
  28.  
  29. Event_Release( event_CLICK, event_ANY, event_ANY, ClickHandler, NULL);
  30.  
  31. return;
  32. }
  33.